|
<%sql= "select * from SMT_xxnews where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and(SMT_title like'%"&word&"%' or SMT_news like'%"&word&"%') order by SMT_id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "| 没有找到能和“"&word&"”匹配的内容，请尝试其它搜索。 | "
else
'分页的实现
listnum=15
Rs.pagesize=listnum
page=Request("page")
if (page-Rs.pagecount) > 0 then
page=Rs.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs.absolutepage=page
'编号的实现
j=rs.recordcount
j=j-(page-1)*listnum
i=0%>
|
<%do while not rs.eof and i"&word&"")
aaa=trim(rs("SMT_news"))
if instr(aaa,word) then
a=len(aaa)
b=instr(aaa,word)
if b<50 then c=left(aaa,b) else c="..."&mid(aaa,b-50,50)
if a-(b+len(word))<50 then d=right(aaa,a-(b+len(word))) else d=mid(aaa,b,50)&"..."
SMT_news=c&d
else
SMT_news=Trim(left(aaa,100))&"..."
end if
SMT_news=replace(SMT_news,word,""&word&"")
'====================
if cityHTML=1 then
webget="Html/xxnews/"&year(rs("SMT_date"))&month(rs("SMT_date"))&"/"&replace(replace(replace(rs("SMT_date"),"-",""),":","")," ","")&".html"
else
webget="new_view.asp?id="&rs("SMT_id")&""
end if
%>
| >> |
target="_blank" class="f14"><%=SMT_title%> (<%=rs("SMT_date")%>) |
|
<%=SMT_news%>... |
|
<%rs.movenext
i=i+1
j=j-1
loop%>
<%filename="search_"&key&".asp?word="&word&"&key="&key%>
| <%=page%>/<%=Rs.pagecount%>
<% if page=1 then %><%else%>
>|<<
&page=<%=page-1%>><<
&page=<%=page-1%>>[<%=page-1%>]
<%end if%><% if Rs.pagecount=1 then %><%else%>[<%=page%>]<%end if%>
<% if Rs.pagecount-page <> 0 then %>
&page=<%=page+1%>>[<%=page+1%>]
&page=<%=page+1%>>>>
&page=<%=Rs.pagecount%>>>>|
<%end if%> |
<%end if%>
|
|
|
|